HA$PBExportHeader$u_cst_test5.sru
forward
global type u_cst_test5 from u_cst_tabpage
end type
type uo_1 from u_cst_statictext within u_cst_test5
end type
type uo_statictext from u_cst_statictext within u_cst_test5
end type
type p_1 from picture within u_cst_test5
end type
end forward

global type u_cst_test5 from u_cst_tabpage
integer width = 2537
integer height = 1536
uo_1 uo_1
uo_statictext uo_statictext
p_1 p_1
end type
global u_cst_test5 u_cst_test5

forward prototypes
public subroutine of_settheme (string as_color)
end prototypes

public subroutine of_settheme (string as_color);
end subroutine

on u_cst_test5.create
int iCurrent
call super::create
this.uo_1=create uo_1
this.uo_statictext=create uo_statictext
this.p_1=create p_1
iCurrent=UpperBound(this.Control)
this.Control[iCurrent+1]=this.uo_1
this.Control[iCurrent+2]=this.uo_statictext
this.Control[iCurrent+3]=this.p_1
end on

on u_cst_test5.destroy
call super::destroy
destroy(this.uo_1)
destroy(this.uo_statictext)
destroy(this.p_1)
end on

event selectionchanged;call super::selectionchanged;w_main.SetMicroHelp("Selection Changed - " + &
		"oldindex: " + String(oldindex) + &
		" newindex: " + String(newindex))

end event

type uo_1 from u_cst_statictext within u_cst_test5
integer x = 23
integer y = 448
integer width = 1385
integer height = 100
integer taborder = 20
boolean #transparent = true
string #text = "Sample app organized by Roland Smith"
string #fontname = "Tahoma"
long #fontsize = 12
boolean #bold = true
boolean #vtop = false
boolean #vcenter = true
end type

on uo_1.destroy
call u_cst_statictext::destroy
end on

type uo_statictext from u_cst_statictext within u_cst_test5
integer x = 23
integer y = 332
integer width = 1385
integer height = 100
integer taborder = 10
boolean #transparent = true
string #text = "GUI Controls by Brad Wery"
string #fontname = "Tahoma"
long #fontsize = 18
boolean #bold = true
boolean #vtop = false
boolean #vcenter = true
end type

on uo_statictext.destroy
call u_cst_statictext::destroy
end on

type p_1 from picture within u_cst_test5
integer x = 37
integer y = 32
integer width = 2478
integer height = 288
boolean originalsize = true
string picturename = "logo.bmp"
boolean focusrectangle = false
end type

